Max Special: Max Gallery/Max Special Gallery.iso/pc/menuag.dir/00020.ls

Text File | 1997-04-03 | 751 b | 41 lines

on startMovie
  global etichettaFrame
  set etichettaFrame to EMPTY
  hideMaxMenu()
  doMusicGeneral()
end

on idle
  testMaxRollover()
  testQuitRollover()
end

on flashRoller whichSprite, numCast, scriptToExecute
  puppetSprite(whichSprite, 1)
  set myCast to numCast
  set the memberNum of sprite whichSprite to myCast + 1
  updateStage()
  do(scriptToExecute)
end

on disabilitaTutto inf, sup
  repeat with i = inf to sup
    puppetSprite(i, 0)
    set the cursor of sprite i to -1
  end repeat
end

on abilitaTutto inf, sup
  repeat with i = inf to sup
    puppetSprite(i, 1)
  end repeat
end

on disabilitaAltri whichSprite, inf, sup
  repeat with i = inf to sup
    if i <> whichSprite then
      puppetSprite(i, 0)
    end if
  end repeat
end